home *** CD-ROM | disk | FTP | other *** search
/ Floppyshop 2 / Floppyshop - 2.zip / Floppyshop - 2.iso / diskmags / 5791-.end / dmg-6260 / articles / colours.doc < prev    next >
Text File  |  1993-07-01  |  2KB  |  77 lines
  1.                          QUICK PALETTE CHANGER
  2.                         ~~~~~~~~~~~~~~~~~~~~~~~
  3.  
  4. I bet some of you out there who  do a lot of word processing would love
  5. to find an easy way to change the rather dross GEM colours to something
  6. more relaxing. Well, I very proudly present (very proudly, because it's
  7. my first assembly program, which I did  all by my little self!) a small
  8. program which can change the colours for you. Here it is:
  9.  
  10.        clr.l -(sp)
  11.        move.w #$20,-(sp)
  12.        trap #1
  13.        add.l #6,sp
  14.        move.l d0,up_save
  15.  
  16.        move.w #0,$ff8240
  17.        move.w #$777,$ff8242
  18.        move.w #3,$ff8244
  19.        move.w #$770,$ff8246
  20.        move.l #txt,-(sp)
  21.        move.w #9,-(sp)
  22.        trap #1
  23.        addq.l #6,sp
  24.        move.l #100000,d0
  25. pause:
  26.        dbra d0,pause
  27.  
  28.        move.l up_save,-(sp)
  29.        move.w #$20,-(sp)
  30.        trap #1
  31.        add.l #6,sp
  32.  
  33.        move.w #20,-(sp)
  34.        move.w #$4c,-(sp)
  35.        trap #1
  36. txt:   dc.b "BLACK EAGLE desktop colour changer",0
  37. up_save:ds.l 1
  38.  
  39.  
  40. I couldn't be bothered to 'rem' it, so here's the description:
  41.  
  42. First 5 lines: Enter supervisor mode (you have to be in supervisor mode
  43.                to be able to change the hardware palette)
  44. Lines 7 to 10: Change the colours (here, they are black, white, blue,
  45.                and yellow)
  46. Lines 11 to 14:Print out message (at end of code)
  47. Lines 15 to 17:Pause a bit for the message
  48. Lines 19 to 22:Return out of supervisor mode
  49. Lines 24 to 26:Exit cleanly
  50. Lines 27 to 28:Set up space for message and non-supervisor mode.
  51.  
  52. Any assembler at all  should  be  able  to  assemble  this code. Simply
  53. change the colour data if required,  and assemble it. (Knowing you, you
  54. will probably change the message, and take all of the credit...)
  55.  
  56. The file COLOURS.S and COLOURS.PRG are included somewhere on this disk.
  57.  
  58. The above program is for medium  resolution.  If you want to change the
  59. 16-colour low-resolution palette, shove these lines in after line 10:
  60.  
  61.           move.w #$rgb,$ff8248
  62.           move.w #$rgb,$ff824A
  63.           move.w #$rgb,$ff824C
  64.           move.w #$rgb,$ff824E
  65.           move.w #$rgb,$ff8250
  66.           move.w #$rgb,$ff8252
  67.           move.w #$rgb,$ff8254
  68.           move.w #$rgb,$ff8256
  69.           move.w #$rgb,$ff8258
  70.           move.w #$rgb,$ff825A
  71.           move.w #$rgb,$ff825C
  72.           move.w #$rgb,$ff825E
  73.  
  74. Swap the 'rgb' for your usual hexadecimal colour values.
  75.  
  76. Article: BLACK EAGLE 1/7/93
  77.